home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 013 / menus.arc / TYPEWRIT < prev   
Encoding:
Text File  |  1987-04-05  |  274 b   |  15 lines
  1. Example #2
  2.  
  3. menudef{0}
  4. prompt{}
  5. prompt{Typewriter Program}
  6. prompt{}
  7. getkey{<ESC> to quit, <RETURN> for next line.}
  8.     option{27}
  9.          quit{}
  10.     option{13}
  11.          prompt{Enter Line:}
  12.          input{0}
  13.          command{echo %0>prn}
  14.          menu{0}
  15.